‹#›
Inventor API 中的零件图、部件图和工程图
创建倒角特征范例
Dim oPartDoc As PartDocument
oPartDoc = _InvApplication.ActiveDocument
Dim oPartDef As PartComponentDefinition
oPartDef = oPartDoc.ComponentDefinition
Dim oEdge As Edge
oEdge = oPartDoc.SelectSet.Item(1) ' Assumes an edge is selected.
Dim oEdges As EdgeCollection
oEdges = ThisApplication.TransientObjects.CreateEdgeCollection
oEdges.Add(oEdge)
Dim oFillet As FilletFeature
oFillet = oPartDef.Features.FilletFeatures.AddSimple(oEdges, 0.5)